home *** CD-ROM | disk | FTP | other *** search
/ X User Tools / X User Tools (O'Reilly and Associates)(1994).ISO / ssol2 / archive / tcltk.z / tcltk / sinclude / tk.h < prev   
C/C++ Source or Header  |  1994-09-20  |  30KB  |  766 lines
  1. /*
  2.  * tk.h --
  3.  *
  4.  *    Declarations for Tk-related things that are visible
  5.  *    outside of the Tk module itself.
  6.  *
  7.  * Copyright (c) 1989-1993 The Regents of the University of California.
  8.  * All rights reserved.
  9.  *
  10.  * Permission is hereby granted, without written agreement and without
  11.  * license or royalty fees, to use, copy, modify, and distribute this
  12.  * software and its documentation for any purpose, provided that the
  13.  * above copyright notice and the following two paragraphs appear in
  14.  * all copies of this software.
  15.  * 
  16.  * IN NO EVENT SHALL THE UNIVERSITY OF CALIFORNIA BE LIABLE TO ANY PARTY FOR
  17.  * DIRECT, INDIRECT, SPECIAL, INCIDENTAL, OR CONSEQUENTIAL DAMAGES ARISING OUT
  18.  * OF THE USE OF THIS SOFTWARE AND ITS DOCUMENTATION, EVEN IF THE UNIVERSITY OF
  19.  * CALIFORNIA HAS BEEN ADVISED OF THE POSSIBILITY OF SUCH DAMAGE.
  20.  *
  21.  * THE UNIVERSITY OF CALIFORNIA SPECIFICALLY DISCLAIMS ANY WARRANTIES,
  22.  * INCLUDING, BUT NOT LIMITED TO, THE IMPLIED WARRANTIES OF MERCHANTABILITY
  23.  * AND FITNESS FOR A PARTICULAR PURPOSE.  THE SOFTWARE PROVIDED HEREUNDER IS
  24.  * ON AN "AS IS" BASIS, AND THE UNIVERSITY OF CALIFORNIA HAS NO OBLIGATION TO
  25.  * PROVIDE MAINTENANCE, SUPPORT, UPDATES, ENHANCEMENTS, OR MODIFICATIONS.
  26.  *
  27.  * $Header: /user6/ouster/wish/RCS/tk.h,v 1.119 93/11/21 14:55:48 ouster Exp $ SPRITE (Berkeley)
  28.  */
  29.  
  30. #ifndef _TK
  31. #define _TK
  32.  
  33. #define TK_VERSION "3.6"
  34. #define TK_MAJOR_VERSION 3
  35. #define TK_MINOR_VERSION 6
  36.  
  37. #ifndef _TCL
  38. #include <tcl.h>
  39. #endif
  40. #ifndef _XLIB_H
  41. #include <X11/Xlib.h>
  42. #endif
  43. #ifdef __STDC__
  44. #include <stddef.h>
  45. #endif
  46.  
  47. /*
  48.  * Dummy types that are used by clients:
  49.  */
  50.  
  51. typedef struct Tk_ErrorHandler_ *Tk_ErrorHandler;
  52. typedef struct Tk_TimerToken_ *Tk_TimerToken;
  53. typedef struct Tk_Window_ *Tk_Window;
  54. typedef struct Tk_3DBorder_ *Tk_3DBorder;
  55. typedef struct Tk_BindingTable_ *Tk_BindingTable;
  56.  
  57. /*
  58.  * Additional types exported to clients.
  59.  */
  60.  
  61. typedef char *Tk_Uid;
  62.  
  63. /*
  64.  * Structure used to specify how to handle argv options.
  65.  */
  66.  
  67. typedef struct {
  68.     char *key;        /* The key string that flags the option in the
  69.              * argv array. */
  70.     int type;        /* Indicates option type;  see below. */
  71.     char *src;        /* Value to be used in setting dst;  usage
  72.              * depends on type. */
  73.     char *dst;        /* Address of value to be modified;  usage
  74.              * depends on type. */
  75.     char *help;        /* Documentation message describing this option. */
  76. } Tk_ArgvInfo;
  77.  
  78. /*
  79.  * Legal values for the type field of a Tk_ArgvInfo: see the user
  80.  * documentation for details.
  81.  */
  82.  
  83. #define TK_ARGV_CONSTANT        15
  84. #define TK_ARGV_INT            16
  85. #define TK_ARGV_STRING            17
  86. #define TK_ARGV_UID            18
  87. #define TK_ARGV_REST            19
  88. #define TK_ARGV_FLOAT            20
  89. #define TK_ARGV_FUNC            21
  90. #define TK_ARGV_GENFUNC            22
  91. #define TK_ARGV_HELP            23
  92. #define TK_ARGV_CONST_OPTION        24
  93. #define TK_ARGV_OPTION_VALUE        25
  94. #define TK_ARGV_OPTION_NAME_VALUE    26
  95. #define TK_ARGV_END            27
  96.  
  97. /*
  98.  * Flag bits for passing to Tk_ParseArgv:
  99.  */
  100.  
  101. #define TK_ARGV_NO_DEFAULTS        0x1
  102. #define TK_ARGV_NO_LEFTOVERS        0x2
  103. #define TK_ARGV_NO_ABBREV        0x4
  104. #define TK_ARGV_DONT_SKIP_FIRST_ARG    0x8
  105.  
  106. /*
  107.  * Structure used to describe application-specific configuration
  108.  * options:  indicates procedures to call to parse an option and
  109.  * to return a text string describing an option.
  110.  */
  111.  
  112. typedef int (Tk_OptionParseProc) _ANSI_ARGS_((ClientData clientData,
  113.     Tcl_Interp *interp, Tk_Window tkwin, char *value, char *widgRec,
  114.     int offset));
  115. typedef char *(Tk_OptionPrintProc) _ANSI_ARGS_((ClientData clientData,
  116.     Tk_Window tkwin, char *widgRec, int offset,
  117.     Tcl_FreeProc **freeProcPtr));
  118.  
  119. typedef struct Tk_CustomOption {
  120.     Tk_OptionParseProc *parseProc;    /* Procedure to call to parse an
  121.                      * option and store it in converted
  122.                      * form. */
  123.     Tk_OptionPrintProc *printProc;    /* Procedure to return a printable
  124.                      * string describing an existing
  125.                      * option. */
  126.     ClientData clientData;        /* Arbitrary one-word value used by
  127.                      * option parser:  passed to
  128.                      * parseProc and printProc. */
  129. } Tk_CustomOption;
  130.  
  131. /*
  132.  * Structure used to specify information for Tk_ConfigureWidget.  Each
  133.  * structure gives complete information for one option, including
  134.  * how the option is specified on the command line, where it appears
  135.  * in the option database, etc.
  136.  */
  137.  
  138. typedef struct Tk_ConfigSpec {
  139.     int type;            /* Type of option, such as TK_CONFIG_COLOR;
  140.                  * see definitions below.  Last option in
  141.                  * table must have type TK_CONFIG_END. */
  142.     char *argvName;        /* Switch used to specify option in argv.
  143.                  * NULL means this spec is part of a group. */
  144.     char *dbName;        /* Name for option in option database. */
  145.     char *dbClass;        /* Class for option in database. */
  146.     char *defValue;        /* Default value for option if not
  147.                  * specified in command line or database. */
  148.     int offset;            /* Where in widget record to store value;
  149.                  * use Tk_Offset macro to generate values
  150.                  * for this. */
  151.     int specFlags;        /* Any combination of the values defined
  152.                  * below;  other bits are used internally
  153.                  * by tkConfig.c. */
  154.     Tk_CustomOption *customPtr;    /* If type is TK_CONFIG_CUSTOM then this is
  155.                  * a pointer to info about how to parse and
  156.                  * print the option.  Otherwise it is
  157.                  * irrelevant. */
  158. } Tk_ConfigSpec;
  159.  
  160. /*
  161.  * Type values for Tk_ConfigSpec structures.  See the user
  162.  * documentation for details.
  163.  */
  164.  
  165. #define TK_CONFIG_BOOLEAN    1
  166. #define TK_CONFIG_INT        2
  167. #define TK_CONFIG_DOUBLE    3
  168. #define TK_CONFIG_STRING    4
  169. #define TK_CONFIG_UID        5
  170. #define TK_CONFIG_COLOR        6
  171. #define TK_CONFIG_FONT        7
  172. #define TK_CONFIG_BITMAP    8
  173. #define TK_CONFIG_BORDER    9
  174. #define TK_CONFIG_RELIEF    10
  175. #define TK_CONFIG_CURSOR    11
  176. #define TK_CONFIG_ACTIVE_CURSOR    12
  177. #define TK_CONFIG_JUSTIFY    13
  178. #define TK_CONFIG_ANCHOR    14
  179. #define TK_CONFIG_SYNONYM    15
  180. #define TK_CONFIG_CAP_STYLE    16
  181. #define TK_CONFIG_JOIN_STYLE    17
  182. #define TK_CONFIG_PIXELS    18
  183. #define TK_CONFIG_MM        19
  184. #define TK_CONFIG_WINDOW    20
  185. #define TK_CONFIG_CUSTOM    21
  186. #define TK_CONFIG_END        22
  187.  
  188. /*
  189.  * Macro to use to fill in "offset" fields of Tk_ConfigInfos.
  190.  * Computes number of bytes from beginning of structure to a
  191.  * given field.
  192.  */
  193.  
  194. #ifdef offsetof
  195. #define Tk_Offset(type, field) ((int) offsetof(type, field))
  196. #else
  197. #define Tk_Offset(type, field) ((int) ((char *) &((type *) 0)->field))
  198. #endif
  199.  
  200. /*
  201.  * Possible values for flags argument to Tk_ConfigureWidget:
  202.  */
  203.  
  204. #define TK_CONFIG_ARGV_ONLY    1
  205.  
  206. /*
  207.  * Possible flag values for Tk_ConfigInfo structures.  Any bits at
  208.  * or above TK_CONFIG_USER_BIT may be used by clients for selecting
  209.  * certain entries.  Before changing any values here, coordinate with
  210.  * tkConfig.c (internal-use-only flags are defined there).
  211.  */
  212.  
  213. #define TK_CONFIG_COLOR_ONLY        1
  214. #define TK_CONFIG_MONO_ONLY        2
  215. #define TK_CONFIG_NULL_OK        4
  216. #define TK_CONFIG_DONT_SET_DEFAULT    8
  217. #define TK_CONFIG_OPTION_SPECIFIED    0x10
  218. #define TK_CONFIG_USER_BIT        0x100
  219.  
  220. /*
  221.  * Bits to pass to Tk_CreateFileHandler to indicate what sorts
  222.  * of events are of interest:
  223.  */
  224.  
  225. #define TK_READABLE    1
  226. #define TK_WRITABLE    2
  227. #define TK_EXCEPTION    4
  228.  
  229. /*
  230.  * Flag values to pass to Tk_DoOneEvent to disable searches
  231.  * for some kinds of events:
  232.  */
  233.  
  234. #define TK_DONT_WAIT        1
  235. #define TK_X_EVENTS        2
  236. #define TK_FILE_EVENTS        4
  237. #define TK_TIMER_EVENTS        8
  238. #define TK_IDLE_EVENTS        0x10
  239. #define TK_ALL_EVENTS        0x1e
  240.  
  241. /*
  242.  * Priority levels to pass to Tk_AddOption:
  243.  */
  244.  
  245. #define TK_WIDGET_DEFAULT_PRIO    20
  246. #define TK_STARTUP_FILE_PRIO    40
  247. #define TK_USER_DEFAULT_PRIO    60
  248. #define TK_INTERACTIVE_PRIO    80
  249. #define TK_MAX_PRIO        100
  250.  
  251. /*
  252.  * Relief values returned by Tk_GetRelief:
  253.  */
  254.  
  255. #define TK_RELIEF_RAISED    1
  256. #define TK_RELIEF_FLAT        2
  257. #define TK_RELIEF_SUNKEN    4
  258. #define TK_RELIEF_GROOVE    8
  259. #define TK_RELIEF_RIDGE        16
  260.  
  261. /*
  262.  * Special EnterNotify/LeaveNotify "mode" for use in events
  263.  * generated by tkShare.c.  Pick a high enough value that it's
  264.  * unlikely to conflict with existing values (like NotifyNormal)
  265.  * or any new values defined in the future.
  266.  */
  267.  
  268. #define TK_NOTIFY_SHARE        20
  269.  
  270. /*
  271.  * Enumerated type for describing a point by which to anchor something:
  272.  */
  273.  
  274. typedef enum {
  275.     TK_ANCHOR_N, TK_ANCHOR_NE, TK_ANCHOR_E, TK_ANCHOR_SE,
  276.     TK_ANCHOR_S, TK_ANCHOR_SW, TK_ANCHOR_W, TK_ANCHOR_NW,
  277.     TK_ANCHOR_CENTER
  278. } Tk_Anchor;
  279.  
  280. /*
  281.  * Enumerated type for describing a style of justification:
  282.  */
  283.  
  284. typedef enum {
  285.     TK_JUSTIFY_LEFT, TK_JUSTIFY_RIGHT,
  286.     TK_JUSTIFY_CENTER, TK_JUSTIFY_FILL
  287. } Tk_Justify;
  288.  
  289. /*
  290.  * Enumerated type for describing the color model that should be used
  291.  * for the application:
  292.  */
  293.  
  294. typedef enum {TK_MONO, TK_COLOR} Tk_ColorModel;
  295.  
  296. /*
  297.  *--------------------------------------------------------------
  298.  *
  299.  * Macros for querying Tk_Window structures.  See the
  300.  * manual entries for documentation.
  301.  *
  302.  *--------------------------------------------------------------
  303.  */
  304.  
  305. #define Tk_Display(tkwin)        (((Tk_FakeWin *) (tkwin))->display)
  306. #define Tk_ScreenNumber(tkwin)        (((Tk_FakeWin *) (tkwin))->screenNum)
  307. #define Tk_Screen(tkwin)        (ScreenOfDisplay(Tk_Display(tkwin), \
  308.     Tk_ScreenNumber(tkwin)))
  309. #define Tk_Depth(tkwin)            (((Tk_FakeWin *) (tkwin))->depth)
  310. #define Tk_Visual(tkwin)        (((Tk_FakeWin *) (tkwin))->visual)
  311. #define Tk_WindowId(tkwin)        (((Tk_FakeWin *) (tkwin))->window)
  312. #define Tk_PathName(tkwin)         (((Tk_FakeWin *) (tkwin))->pathName)
  313. #define Tk_Name(tkwin)            (((Tk_FakeWin *) (tkwin))->nameUid)
  314. #define Tk_Class(tkwin)         (((Tk_FakeWin *) (tkwin))->classUid)
  315. #define Tk_X(tkwin)            (((Tk_FakeWin *) (tkwin))->changes.x)
  316. #define Tk_Y(tkwin)            (((Tk_FakeWin *) (tkwin))->changes.y)
  317. #define Tk_Width(tkwin)            (((Tk_FakeWin *) (tkwin))->changes.width)
  318. #define Tk_Height(tkwin) \
  319.     (((Tk_FakeWin *) (tkwin))->changes.height)
  320. #define Tk_Changes(tkwin)        (&((Tk_FakeWin *) (tkwin))->changes)
  321. #define Tk_Attributes(tkwin)        (&((Tk_FakeWin *) (tkwin))->atts)
  322. #define Tk_IsMapped(tkwin) \
  323.     (((Tk_FakeWin *) (tkwin))->flags & TK_MAPPED)
  324. #define Tk_IsTopLevel(tkwin) \
  325.     (((Tk_FakeWin *) (tkwin))->flags & TK_TOP_LEVEL)
  326. #define Tk_ReqWidth(tkwin)        (((Tk_FakeWin *) (tkwin))->reqWidth)
  327. #define Tk_ReqHeight(tkwin)        (((Tk_FakeWin *) (tkwin))->reqHeight)
  328. #define Tk_InternalBorderWidth(tkwin) \
  329.     (((Tk_FakeWin *) (tkwin))->internalBorderWidth)
  330. #define Tk_Parent(tkwin)        (((Tk_FakeWin *) (tkwin))->parentPtr)
  331. #define Tk_Colormap(tkwin)        (((Tk_FakeWin *) (tkwin))->atts.colormap)
  332.  
  333. /*
  334.  * The structure below is needed by the macros above so that they can
  335.  * access the fields of a Tk_Window.  The fields not needed by the macros
  336.  * are declared as "dummyX".  The structure has its own type in order to
  337.  * prevent applications from accessing Tk_Window fields except using
  338.  * official macros.  WARNING!! The structure definition must be kept
  339.  * consistent with the TkWindow structure in tkInt.h.  If you change one,
  340.  * then change the other.  See the declaration in tkInt.h for
  341.  * documentation on what the fields are used for internally.
  342.  */
  343.  
  344. typedef struct Tk_FakeWin {
  345.     Display *display;
  346.     char *dummy1;
  347.     int screenNum;
  348.     Visual *visual;
  349.     int depth;
  350.     Window window;
  351.     char *dummy2;
  352.     char *dummy3;
  353.     Tk_Window parentPtr;
  354.     char *dummy4;
  355.     char *dummy5;
  356.     char *pathName;
  357.     Tk_Uid nameUid;
  358.     Tk_Uid classUid;
  359.     XWindowChanges changes;
  360.     unsigned int dummy6;
  361.     XSetWindowAttributes atts;
  362.     unsigned long dummy7;
  363.     unsigned int flags;
  364.     char *dummy8;
  365.     char *dummy9;
  366.     ClientData dummy10;
  367.     int dummy12;
  368.     char *dummy13;
  369.     char *dummy14;
  370.     ClientData dummy15;
  371.     char *dummy16;
  372.     ClientData dummy17;
  373.     int reqWidth, reqHeight;
  374.     int internalBorderWidth;
  375.     char *dummyX;
  376. } Tk_FakeWin;
  377.  
  378. /*
  379.  * Flag values for TkWindow (and Tk_FakeWin) structures are:
  380.  *
  381.  * TK_MAPPED:            1 means window is currently mapped,
  382.  *                0 means unmapped.
  383.  * TK_RECURSIVE_DESTROY:    1 means a recursive destroy is in
  384.  *                progress, so some cleanup operations
  385.  *                can be omitted.
  386.  * TK_TOP_LEVEL:        1 means this is a top-level window (it
  387.  *                was or will be created as a child of
  388.  *                a root window).
  389.  * TK_ALREADY_DEAD:        1 means the window is in the process of
  390.  *                being destroyed already.
  391.  * TK_NEED_CONFIG_NOTIFY:    1 means that the window has been reconfigured
  392.  *                before it was made to exist.  At the time of
  393.  *                making it exist a ConfigureNotify event needs
  394.  *                to be generated.
  395.  * TK_GRAB_FLAG:        Used to manage grabs.  See tkGrab.c for
  396.  *                details.
  397.  */
  398.  
  399. #define TK_MAPPED        1
  400. #define TK_RECURSIVE_DESTROY    2
  401. #define TK_TOP_LEVEL        4
  402. #define TK_ALREADY_DEAD        8
  403. #define TK_NEED_CONFIG_NOTIFY    0x10
  404. #define TK_GRAB_FLAG        0x20
  405.  
  406. /*
  407.  *--------------------------------------------------------------
  408.  *
  409.  * Additional procedure types defined by Tk.
  410.  *
  411.  *--------------------------------------------------------------
  412.  */
  413.  
  414. typedef int (Tk_ErrorProc) _ANSI_ARGS_((ClientData clientData,
  415.     XErrorEvent *errEventPtr));
  416. typedef void (Tk_EventProc) _ANSI_ARGS_((ClientData clientData,
  417.     XEvent *eventPtr));
  418. typedef void (Tk_FileProc) _ANSI_ARGS_((ClientData clientData, int mask));
  419. typedef void (Tk_FocusProc) _ANSI_ARGS_((ClientData clientData, int gotFocus));
  420. typedef void (Tk_FreeProc) _ANSI_ARGS_((ClientData clientData));
  421. typedef int (Tk_GenericProc) _ANSI_ARGS_((ClientData clientData,
  422.     XEvent *eventPtr));
  423. typedef void (Tk_GeometryProc) _ANSI_ARGS_((ClientData clientData,
  424.     Tk_Window tkwin));
  425. typedef int (Tk_GetSelProc) _ANSI_ARGS_((ClientData clientData,
  426.     Tcl_Interp *interp, char *portion));
  427. typedef void (Tk_IdleProc) _ANSI_ARGS_((ClientData clientData));
  428. typedef void (Tk_LostSelProc) _ANSI_ARGS_((ClientData clientData));
  429. typedef Bool (Tk_RestrictProc) _ANSI_ARGS_((Display *display, XEvent *eventPtr,
  430.     char *arg));
  431. typedef int (Tk_SelectionProc) _ANSI_ARGS_((ClientData clientData,
  432.     int offset, char *buffer, int maxBytes));
  433. typedef void (Tk_TimerProc) _ANSI_ARGS_((ClientData clientData));
  434.  
  435. /*
  436.  *--------------------------------------------------------------
  437.  *
  438.  * Exported procedures and variables.
  439.  *
  440.  *--------------------------------------------------------------
  441.  */
  442.  
  443. EXTERN XColor *        Tk_3DBorderColor _ANSI_ARGS_((Tk_3DBorder border));
  444. EXTERN void        Tk_AddOption _ANSI_ARGS_((Tk_Window tkwin, char *name,
  445.                 char *value, int priority));
  446. EXTERN void        Tk_BackgroundError _ANSI_ARGS_((Tcl_Interp *interp));
  447. EXTERN void        Tk_BindEvent _ANSI_ARGS_((Tk_BindingTable bindingTable,
  448.                 XEvent *eventPtr, Tk_Window tkwin, int numObjects,
  449.                 ClientData *objectPtr));
  450. EXTERN void        Tk_CancelIdleCall _ANSI_ARGS_((Tk_IdleProc *idleProc,
  451.                 ClientData clientData));
  452. EXTERN void        Tk_ChangeWindowAttributes _ANSI_ARGS_((Tk_Window tkwin,
  453.                 unsigned long valueMask,
  454.                 XSetWindowAttributes *attsPtr));
  455. EXTERN void        Tk_ClearSelection _ANSI_ARGS_((Tk_Window tkwin));
  456. EXTERN void        Tk_ConfigureFree _ANSI_ARGS_((Tk_ConfigSpec *specs,
  457.                 char *widgRec, Display *display, int needFlags));
  458. EXTERN int        Tk_ConfigureInfo _ANSI_ARGS_((Tcl_Interp *interp,
  459.                 Tk_Window tkwin, Tk_ConfigSpec *specs,
  460.                 char *widgRec, char *argvName, int flags));
  461. EXTERN int        Tk_ConfigureWidget _ANSI_ARGS_((Tcl_Interp *interp,
  462.                 Tk_Window tkwin, Tk_ConfigSpec *specs,
  463.                 int argc, char **argv, char *widgRec,
  464.                 int flags));
  465. EXTERN void        Tk_ConfigureWindow _ANSI_ARGS_((Tk_Window tkwin,
  466.                 unsigned int valueMask, XWindowChanges *valuePtr));
  467. EXTERN Tk_Window    Tk_CoordsToWindow _ANSI_ARGS_((int rootX, int rootY,
  468.                 Tk_Window tkwin));
  469. EXTERN unsigned long    Tk_CreateBinding _ANSI_ARGS_((Tcl_Interp *interp,
  470.                 Tk_BindingTable bindingTable, ClientData object,
  471.                 char *eventString, char *command, int append));
  472. EXTERN Tk_BindingTable    Tk_CreateBindingTable _ANSI_ARGS_((Tcl_Interp *interp));
  473. EXTERN Tk_ErrorHandler    Tk_CreateErrorHandler _ANSI_ARGS_((Display *display,
  474.                 int errNum, int request, int minorCode,
  475.                 Tk_ErrorProc *errorProc, ClientData clientData));
  476. EXTERN void        Tk_CreateEventHandler _ANSI_ARGS_((Tk_Window token,
  477.                 unsigned long mask, Tk_EventProc *proc,
  478.                 ClientData clientData));
  479. EXTERN void        Tk_CreateFileHandler _ANSI_ARGS_((int fd, int mask,
  480.                 Tk_FileProc *proc, ClientData clientData));
  481. EXTERN void        Tk_CreateFocusHandler _ANSI_ARGS_((Tk_Window tkwin,
  482.                 Tk_FocusProc *proc, ClientData clientData));
  483. EXTERN void        Tk_CreateGenericHandler _ANSI_ARGS_((
  484.                 Tk_GenericProc *proc, ClientData clientData));
  485. EXTERN Tk_Window    Tk_CreateMainWindow _ANSI_ARGS_((Tcl_Interp *interp,
  486.                 char *screenName, char *baseName,
  487.                 char *className));
  488. EXTERN void        Tk_CreateSelHandler _ANSI_ARGS_((Tk_Window tkwin,
  489.                 Atom target, Tk_SelectionProc *proc,
  490.                 ClientData clientData, Atom format));
  491. EXTERN Tk_TimerToken    Tk_CreateTimerHandler _ANSI_ARGS_((int milliseconds,
  492.                 Tk_TimerProc *proc, ClientData clientData));
  493. EXTERN Tk_Window    Tk_CreateWindow _ANSI_ARGS_((Tcl_Interp *interp,
  494.                 Tk_Window parent, char *name, char *screenName));
  495. EXTERN Tk_Window    Tk_CreateWindowFromPath _ANSI_ARGS_((
  496.                 Tcl_Interp *interp, Tk_Window tkwin,
  497.                 char *pathName, char *screenName));
  498. EXTERN int        Tk_DefineBitmap _ANSI_ARGS_((Tcl_Interp *interp,
  499.                 Tk_Uid name, char *source, unsigned int width,
  500.                 unsigned int height));
  501. EXTERN void        Tk_DefineCursor _ANSI_ARGS_((Tk_Window window,
  502.                 Cursor cursor));
  503. EXTERN void        Tk_DeleteAllBindings _ANSI_ARGS_((
  504.                 Tk_BindingTable bindingTable, ClientData object));
  505. EXTERN int        Tk_DeleteBinding _ANSI_ARGS_((Tcl_Interp *interp,
  506.                 Tk_BindingTable bindingTable, ClientData object,
  507.                 char *eventString));
  508. EXTERN void        Tk_DeleteBindingTable _ANSI_ARGS_((
  509.                 Tk_BindingTable bindingTable));
  510. EXTERN void        Tk_DeleteErrorHandler _ANSI_ARGS_((
  511.                 Tk_ErrorHandler handler));
  512. EXTERN void        Tk_DeleteEventHandler _ANSI_ARGS_((Tk_Window token,
  513.                 unsigned long mask, Tk_EventProc *proc,
  514.                 ClientData clientData));
  515. EXTERN void        Tk_DeleteFileHandler _ANSI_ARGS_((int fd));
  516. EXTERN void        Tk_DeleteGenericHandler _ANSI_ARGS_((
  517.                 Tk_GenericProc *proc, ClientData clientData));
  518. EXTERN void        Tk_DeleteSelHandler _ANSI_ARGS_((Tk_Window tkwin,
  519.                 Atom target));
  520. EXTERN void        Tk_DeleteTimerHandler _ANSI_ARGS_((
  521.                 Tk_TimerToken token));
  522. EXTERN void        Tk_DestroyWindow _ANSI_ARGS_((Tk_Window tkwin));
  523. EXTERN char *        Tk_DisplayName _ANSI_ARGS_((Tk_Window tkwin));
  524. EXTERN int        Tk_DoOneEvent _ANSI_ARGS_((int flags));
  525. EXTERN void        Tk_DoWhenIdle _ANSI_ARGS_((Tk_IdleProc *proc,
  526.                 ClientData clientData));
  527. EXTERN void        Tk_Draw3DPolygon _ANSI_ARGS_((Display *display,
  528.                 Drawable drawable, Tk_3DBorder border,
  529.                 XPoint *pointPtr, int numPoints, int borderWidth,
  530.                 int leftRelief));
  531. EXTERN void        Tk_Draw3DRectangle _ANSI_ARGS_((Display *display,
  532.                 Drawable drawable, Tk_3DBorder border, int x,
  533.                 int y, int width, int height, int borderWidth,
  534.                 int relief));
  535. EXTERN void        Tk_EventuallyFree _ANSI_ARGS_((ClientData clientData,
  536.                 Tk_FreeProc *freeProc));
  537. EXTERN void        Tk_Fill3DPolygon _ANSI_ARGS_((Display *display,
  538.                 Drawable drawable, Tk_3DBorder border,
  539.                 XPoint *pointPtr, int numPoints, int borderWidth,
  540.                 int leftRelief));
  541. EXTERN void        Tk_Fill3DRectangle _ANSI_ARGS_((Display *display,
  542.                 Drawable drawable, Tk_3DBorder border, int x,
  543.                 int y, int width, int height, int borderWidth,
  544.                 int relief));
  545. EXTERN void        Tk_Free3DBorder _ANSI_ARGS_((Tk_3DBorder border));
  546. EXTERN void        Tk_FreeBitmap _ANSI_ARGS_((Display *display,
  547.                 Pixmap bitmap));
  548. EXTERN void        Tk_FreeColor _ANSI_ARGS_((XColor *colorPtr));
  549. EXTERN void        Tk_FreeCursor _ANSI_ARGS_((Display *display,
  550.                 Cursor cursor));
  551. EXTERN void        Tk_FreeFontStruct _ANSI_ARGS_((
  552.                 XFontStruct *fontStructPtr));
  553. EXTERN void        Tk_FreeGC _ANSI_ARGS_((Display *display, GC gc));
  554. EXTERN void        Tk_FreeOptions _ANSI_ARGS_((Tk_ConfigSpec *specs,
  555.                 char *widgRec, Display *display, int needFlags));
  556. EXTERN void        Tk_GeometryRequest _ANSI_ARGS_((Tk_Window tkwin,
  557.                 int reqWidth,  int reqHeight));
  558. EXTERN Tk_3DBorder    Tk_Get3DBorder _ANSI_ARGS_((Tcl_Interp *interp,
  559.                 Tk_Window tkwin, Colormap colormap,
  560.                 Tk_Uid colorName));
  561. EXTERN void        Tk_GetAllBindings _ANSI_ARGS_((Tcl_Interp *interp,
  562.                 Tk_BindingTable bindingTable, ClientData object));
  563. EXTERN int        Tk_GetAnchor _ANSI_ARGS_((Tcl_Interp *interp,
  564.                 char *string, Tk_Anchor *anchorPtr));
  565. EXTERN char *        Tk_GetAtomName _ANSI_ARGS_((Tk_Window tkwin,
  566.                 Atom atom));
  567. EXTERN char *        Tk_GetBinding _ANSI_ARGS_((Tcl_Interp *interp,
  568.                 Tk_BindingTable bindingTable, ClientData object,
  569.                 char *eventString));
  570. EXTERN Pixmap        Tk_GetBitmap _ANSI_ARGS_((Tcl_Interp *interp,
  571.                 Tk_Window tkwin, Tk_Uid string));
  572. EXTERN Pixmap        Tk_GetBitmapFromData _ANSI_ARGS_((Tcl_Interp *interp,
  573.                 Tk_Window tkwin, char *source,
  574.                 unsigned int width, unsigned int height));
  575. EXTERN int        Tk_GetCapStyle _ANSI_ARGS_((Tcl_Interp *interp,
  576.                 char *string, int *capPtr));
  577. EXTERN XColor *        Tk_GetColor _ANSI_ARGS_((Tcl_Interp *interp,
  578.                 Tk_Window tkwin, Colormap colormap, Tk_Uid name));
  579. EXTERN XColor *        Tk_GetColorByValue _ANSI_ARGS_((Tcl_Interp *interp,
  580.                 Tk_Window tkwin, Colormap colormap,
  581.                 XColor *colorPtr));
  582. EXTERN Tk_ColorModel    Tk_GetColorModel _ANSI_ARGS_((Tk_Window tkwin));
  583. EXTERN Cursor        Tk_GetCursor _ANSI_ARGS_((Tcl_Interp *interp,
  584.                 Tk_Window tkwin, Tk_Uid string));
  585. EXTERN Cursor        Tk_GetCursorFromData _ANSI_ARGS_((Tcl_Interp *interp,
  586.                 Tk_Window tkwin, char *source, char *mask,
  587.                 unsigned int width, unsigned int height,
  588.                 int xHot, int yHot, Tk_Uid fg, Tk_Uid bg));
  589. EXTERN XFontStruct *    Tk_GetFontStruct _ANSI_ARGS_((Tcl_Interp *interp,
  590.                 Tk_Window tkwin, Tk_Uid name));
  591. EXTERN GC        Tk_GetGC _ANSI_ARGS_((Tk_Window tkwin,
  592.                 unsigned long valueMask, XGCValues *valuePtr));
  593. EXTERN int        Tk_GetJoinStyle _ANSI_ARGS_((Tcl_Interp *interp,
  594.                 char *string, int *joinPtr));
  595. EXTERN int        Tk_GetJustify _ANSI_ARGS_((Tcl_Interp *interp,
  596.                 char *string, Tk_Justify *justifyPtr));
  597. EXTERN Tk_Uid        Tk_GetOption _ANSI_ARGS_((Tk_Window tkwin, char *name,
  598.                 char *className));
  599. EXTERN int        Tk_GetPixels _ANSI_ARGS_((Tcl_Interp *interp,
  600.                 Tk_Window tkwin, char *string, int *intPtr));
  601. EXTERN int        Tk_GetRelief _ANSI_ARGS_((Tcl_Interp *interp,
  602.                 char *name, int *reliefPtr));
  603. EXTERN void        Tk_GetRootCoords _ANSI_ARGS_ ((Tk_Window tkwin,
  604.                 int *xPtr, int *yPtr));
  605. EXTERN int        Tk_GetScreenMM _ANSI_ARGS_((Tcl_Interp *interp,
  606.                 Tk_Window tkwin, char *string, double *doublePtr));
  607. EXTERN int        Tk_GetSelection _ANSI_ARGS_((Tcl_Interp *interp,
  608.                 Tk_Window tkwin, Atom target, Tk_GetSelProc *proc,
  609.                 ClientData clientData));
  610. EXTERN Tk_Uid        Tk_GetUid _ANSI_ARGS_((char *string));
  611. EXTERN void        Tk_GetVRootGeometry _ANSI_ARGS_((Tk_Window tkwin,
  612.                 int *xPtr, int *yPtr, unsigned int *widthPtr,
  613.                 unsigned int *heightPtr));
  614. EXTERN int        Tk_Grab _ANSI_ARGS_((Tcl_Interp *interp,
  615.                 Tk_Window tkwin, int grabGlobal));
  616. EXTERN void        Tk_HandleEvent _ANSI_ARGS_((XEvent *eventPtr));
  617. EXTERN int        Tk_Init _ANSI_ARGS_((Tcl_Interp *interp));
  618. EXTERN Atom        Tk_InternAtom _ANSI_ARGS_((Tk_Window tkwin,
  619.                 char *name));
  620. EXTERN void        Tk_MainLoop _ANSI_ARGS_((void));
  621. EXTERN Tk_Window    Tk_MainWindow _ANSI_ARGS_((Tcl_Interp *interp));
  622. EXTERN void        Tk_MakeWindowExist _ANSI_ARGS_((Tk_Window tkwin));
  623. EXTERN void        Tk_ManageGeometry _ANSI_ARGS_((Tk_Window tkwin,
  624.                 Tk_GeometryProc *proc, ClientData clientData));
  625. EXTERN void        Tk_MapWindow _ANSI_ARGS_((Tk_Window tkwin));
  626. EXTERN void        Tk_MoveResizeWindow _ANSI_ARGS_((Tk_Window tkwin,
  627.                 int x, int y, unsigned int width,
  628.                 unsigned int height));
  629. EXTERN void        Tk_MoveWindow _ANSI_ARGS_((Tk_Window tkwin, int x,
  630.                 int y));
  631. EXTERN void        Tk_MoveToplevelWindow _ANSI_ARGS_((Tk_Window tkwin,
  632.                 int x, int y));
  633. EXTERN char *        Tk_NameOf3DBorder _ANSI_ARGS_((Tk_3DBorder border));
  634. EXTERN char *        Tk_NameOfAnchor _ANSI_ARGS_((Tk_Anchor anchor));
  635. EXTERN char *        Tk_NameOfBitmap _ANSI_ARGS_((Display *display,
  636.                 Pixmap bitmap));
  637. EXTERN char *        Tk_NameOfCapStyle _ANSI_ARGS_((int cap));
  638. EXTERN char *        Tk_NameOfColor _ANSI_ARGS_((XColor *colorPtr));
  639. EXTERN char *        Tk_NameOfCursor _ANSI_ARGS_((Display *display,
  640.                 Cursor cursor));
  641. EXTERN char *        Tk_NameOfFontStruct _ANSI_ARGS_((
  642.                 XFontStruct *fontStructPtr));
  643. EXTERN char *        Tk_NameOfJoinStyle _ANSI_ARGS_((int join));
  644. EXTERN char *        Tk_NameOfJustify _ANSI_ARGS_((Tk_Justify justify));
  645. EXTERN char *        Tk_NameOfRelief _ANSI_ARGS_((int relief));
  646. EXTERN Tk_Window    Tk_NameToWindow _ANSI_ARGS_((Tcl_Interp *interp,
  647.                 char *pathName, Tk_Window tkwin));
  648. EXTERN void        Tk_OwnSelection _ANSI_ARGS_((Tk_Window tkwin,
  649.                 Tk_LostSelProc *proc, ClientData clientData));
  650. EXTERN int        Tk_ParseArgv _ANSI_ARGS_((Tcl_Interp *interp,
  651.                 Tk_Window tkwin, int *argcPtr, char **argv,
  652.                 Tk_ArgvInfo *argTable, int flags));
  653. EXTERN void        Tk_Preserve _ANSI_ARGS_((ClientData clientData));
  654. EXTERN int        Tk_RegisterInterp _ANSI_ARGS_((Tcl_Interp *interp,
  655.                 char *name, Tk_Window tkwin));
  656. EXTERN void        Tk_Release _ANSI_ARGS_((ClientData clientData));
  657. EXTERN void        Tk_ResizeWindow _ANSI_ARGS_((Tk_Window tkwin,
  658.                 unsigned int width, unsigned int height));
  659. EXTERN int        Tk_RestackWindow _ANSI_ARGS_((Tk_Window tkwin,
  660.                 int aboveBelow, Tk_Window other));
  661. EXTERN Tk_RestrictProc *Tk_RestrictEvents _ANSI_ARGS_((Tk_RestrictProc *proc,
  662.                 char *arg, char **prevArgPtr));
  663. EXTERN void        Tk_SetBackgroundFromBorder _ANSI_ARGS_((
  664.                 Tk_Window tkwin, Tk_3DBorder border));
  665. EXTERN void        Tk_SetClass _ANSI_ARGS_((Tk_Window tkwin,
  666.                 char *className));
  667. EXTERN void        Tk_SetColorModel _ANSI_ARGS_((Tk_Window tkwin,
  668.                 Tk_ColorModel model));
  669. EXTERN void        Tk_SetGrid _ANSI_ARGS_((Tk_Window tkwin,
  670.                 int reqWidth, int reqHeight, int gridWidth,
  671.                 int gridHeight));
  672. EXTERN void        Tk_SetInternalBorder _ANSI_ARGS_((Tk_Window tkwin,
  673.                 int width));
  674. EXTERN void        Tk_SetWindowBackground _ANSI_ARGS_((Tk_Window tkwin,
  675.                 unsigned long pixel));
  676. EXTERN void        Tk_SetWindowBackgroundPixmap _ANSI_ARGS_((
  677.                 Tk_Window tkwin, Pixmap pixmap));
  678. EXTERN void        Tk_SetWindowBorder _ANSI_ARGS_((Tk_Window tkwin,
  679.                 unsigned long pixel));
  680. EXTERN void        Tk_SetWindowBorderWidth _ANSI_ARGS_((Tk_Window tkwin,
  681.                 int width));
  682. EXTERN void        Tk_SetWindowBorderPixmap _ANSI_ARGS_((Tk_Window tkwin,
  683.                 Pixmap pixmap));
  684. EXTERN void        Tk_SetWindowColormap _ANSI_ARGS_((Tk_Window tkwin,
  685.                 Colormap colormap));
  686. EXTERN int        Tk_SetWindowVisual _ANSI_ARGS_((Tk_Window tkwin,
  687.                 Visual *visual, unsigned int depth,
  688.                 Colormap colormap));
  689. EXTERN void        Tk_SizeOfBitmap _ANSI_ARGS_((Display *display,
  690.                 Pixmap bitmap, unsigned int *widthPtr,
  691.                 unsigned int *heightPtr));
  692. EXTERN void        Tk_Sleep _ANSI_ARGS_((int ms));
  693. EXTERN void        Tk_UndefineCursor _ANSI_ARGS_((Tk_Window window));
  694. EXTERN void        Tk_Ungrab _ANSI_ARGS_((Tk_Window tkwin));
  695. EXTERN void        Tk_UnmapWindow _ANSI_ARGS_((Tk_Window tkwin));
  696.  
  697.  
  698. EXTERN int        tk_NumMainWindows;
  699.  
  700. /*
  701.  * Tcl commands exported by Tk:
  702.  */
  703.  
  704. EXTERN int        Tk_AfterCmd _ANSI_ARGS_((ClientData clientData,
  705.                 Tcl_Interp *interp, int argc, char **argv));
  706. EXTERN int        Tk_ApplicationCmd _ANSI_ARGS_((ClientData clientData,
  707.                 Tcl_Interp *interp, int argc, char **argv));
  708. EXTERN int        Tk_BindCmd _ANSI_ARGS_((ClientData clientData,
  709.                 Tcl_Interp *interp, int argc, char **argv));
  710. EXTERN int        Tk_ButtonCmd _ANSI_ARGS_((ClientData clientData,
  711.                 Tcl_Interp *interp, int argc, char **argv));
  712. EXTERN int        Tk_CanvasCmd _ANSI_ARGS_((ClientData clientData,
  713.                 Tcl_Interp *interp, int argc, char **argv));
  714. EXTERN int        Tk_DestroyCmd _ANSI_ARGS_((ClientData clientData,
  715.                 Tcl_Interp *interp, int argc, char **argv));
  716. EXTERN int        Tk_EntryCmd _ANSI_ARGS_((ClientData clientData,
  717.                 Tcl_Interp *interp, int argc, char **argv));
  718. EXTERN int        Tk_ExitCmd _ANSI_ARGS_((ClientData clientData,
  719.                 Tcl_Interp *interp, int argc, char **argv));
  720. EXTERN int        Tk_FrameCmd _ANSI_ARGS_((ClientData clientData,
  721.                 Tcl_Interp *interp, int argc, char **argv));
  722. EXTERN int        Tk_FocusCmd _ANSI_ARGS_((ClientData clientData,
  723.                 Tcl_Interp *interp, int argc, char **argv));
  724. EXTERN int        Tk_GrabCmd _ANSI_ARGS_((ClientData clientData,
  725.                 Tcl_Interp *interp, int argc, char **argv));
  726. EXTERN int        Tk_ListboxCmd _ANSI_ARGS_((ClientData clientData,
  727.                 Tcl_Interp *interp, int argc, char **argv));
  728. EXTERN int        Tk_LowerCmd _ANSI_ARGS_((ClientData clientData,
  729.                 Tcl_Interp *interp, int argc, char **argv));
  730. EXTERN int        Tk_MenuCmd _ANSI_ARGS_((ClientData clientData,
  731.                 Tcl_Interp *interp, int argc, char **argv));
  732. EXTERN int        Tk_MenubuttonCmd _ANSI_ARGS_((ClientData clientData,
  733.                 Tcl_Interp *interp, int argc, char **argv));
  734. EXTERN int        Tk_MessageCmd _ANSI_ARGS_((ClientData clientData,
  735.                 Tcl_Interp *interp, int argc, char **argv));
  736. EXTERN int        Tk_OptionCmd _ANSI_ARGS_((ClientData clientData,
  737.                 Tcl_Interp *interp, int argc, char **argv));
  738. EXTERN int        Tk_PackCmd _ANSI_ARGS_((ClientData clientData,
  739.                 Tcl_Interp *interp, int argc, char **argv));
  740. EXTERN int        Tk_PlaceCmd _ANSI_ARGS_((ClientData clientData,
  741.                 Tcl_Interp *interp, int argc, char **argv));
  742. EXTERN int        Tk_RaiseCmd _ANSI_ARGS_((ClientData clientData,
  743.                 Tcl_Interp *interp, int argc, char **argv));
  744. EXTERN int        Tk_ScaleCmd _ANSI_ARGS_((ClientData clientData,
  745.                 Tcl_Interp *interp, int argc, char **argv));
  746. EXTERN int        Tk_ScrollbarCmd _ANSI_ARGS_((ClientData clientData,
  747.                 Tcl_Interp *interp, int argc, char **argv));
  748. EXTERN int        Tk_SelectionCmd _ANSI_ARGS_((ClientData clientData,
  749.                 Tcl_Interp *interp, int argc, char **argv));
  750. EXTERN int        Tk_SendCmd _ANSI_ARGS_((ClientData clientData,
  751.                 Tcl_Interp *interp, int argc, char **argv));
  752. EXTERN int        Tk_TextCmd _ANSI_ARGS_((ClientData clientData,
  753.                 Tcl_Interp *interp, int argc, char **argv));
  754. EXTERN int        Tk_TkCmd _ANSI_ARGS_((ClientData clientData,
  755.                 Tcl_Interp *interp, int argc, char **argv));
  756. EXTERN int        Tk_TkwaitCmd _ANSI_ARGS_((ClientData clientData,
  757.                 Tcl_Interp *interp, int argc, char **argv));
  758. EXTERN int        Tk_UpdateCmd _ANSI_ARGS_((ClientData clientData,
  759.                 Tcl_Interp *interp, int argc, char **argv));
  760. EXTERN int        Tk_WinfoCmd _ANSI_ARGS_((ClientData clientData,
  761.                 Tcl_Interp *interp, int argc, char **argv));
  762. EXTERN int        Tk_WmCmd _ANSI_ARGS_((ClientData clientData,
  763.                 Tcl_Interp *interp, int argc, char **argv));
  764.  
  765. #endif /* _TK */
  766.